home *** CD-ROM | disk | FTP | other *** search
/ Acorn RISC PD-CD 1 / Acorn RISC PD-CD 1.iso / games / _spatience / spatience / scripts / wholepack < prev   
Encoding:
Text File  |  1992-07-23  |  915 b   |  66 lines
  1. |
  2. |  Rules for wholepack patience
  3. |  Written by J.Horsnell
  4. |
  5. SCRIPT_TYPE 1
  6. |
  7. BEGIN "Wholepack patience"
  8.  
  9.   FLAGS ClickFly AnimateFly
  10.   WIDTH 10 * 76 + 14
  11.   HEIGHT 3000
  12.   ZeroToWin 52 - CARDSIN$2
  13.  
  14.   FOR stack = 0 TO 1
  15.     FOUNDATION
  16.       X 8 * 76 + 12
  17.       Y 16 + 100 * stack
  18.       ID 2
  19.     END
  20.   END
  21.  
  22.   FOR stack = 0 TO 1
  23.     FOUNDATION
  24.       X 7 * 76 + 12 + stack * 152
  25.       Y 16 + 50 
  26.       ID 2
  27.     END
  28.   END
  29.  
  30.   STACK
  31.     X 12
  32.     y 16
  33.     FIRST 13
  34.     MAX 52
  35.     JoinOffset -1
  36.     DEAL 2 , 1
  37.     FLAGS RotateJoin ClickFly JoinSS__
  38.     ID 1
  39.   END
  40.  
  41.   STACK
  42.     X 12 + 76
  43.     y 16
  44.     FIRST 13
  45.     MAX 52
  46.     JoinOffset -1
  47.     DEAL 5 , 2
  48.     FLAGS RotateJoin ClickFly JoinSS__
  49.     ID 1
  50.   END
  51.  
  52.   FOR stack = 2 to 6
  53.     STACK
  54.       X stack * 76 + 12
  55.       y 16
  56.       FIRST 13
  57.       MAX 52
  58.       JoinOffset -1
  59.       DEAL stack + 5 , stack + 1
  60.       FLAGS RotateJoin ClickFly JoinSS__
  61.       ID 1
  62.     END
  63.   END
  64.  
  65. END
  66.